home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 13
/
CU Amiga Magazine's Super CD-ROM 13 (1997)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1997-08].iso
/
CUCD
/
Graphics
/
WildFire
/
WildFireFPU
/
Macros
/
requester.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1997-01-12
|
616b
|
30 lines
/*
------------------------------------------------------------
requester.rexx
This script demonstrates the purpose of "m_request"-command
Copyright ©1996 WK-Artworks
------------------------------------------------------------
*/
if ~show('P','Wildfire') then do
say " Error: The Wildfire-program must be started before executing this script."
exit
end
address 'Wildfire'
options results
m_request "Do you really wan't to continue this stupid operation ?"
tt=result
if tt=1 then do
m_message "This was the better choice."
exit
end
do loop=1 to 10
msg="Message " || loop || " of 10"
m_message msg
end